home *** CD-ROM | disk | FTP | other *** search
/ Shareware Games Galore! / Shareware Games Galore!.iso / arcade / corewars / wars4.rdc < prev   
Text File  |  1989-04-28  |  410b  |  24 lines
  1.     ; WARS v4.0
  2.     ; (C) Lars Riemer 1988
  3.     ;
  4. START    ;
  5.     MOV    #-11    SLABEL
  6. INIT    ;    
  7.     MOV    SLABEL    <SLABEL
  8.     SUB    #1    SLABEL
  9.     DJN    INIT    COUNTER
  10.     SPL    KILLER
  11. EAT    ;
  12.     MOV    SLABEL    <SLABEL    ; @SLABEL
  13.     DJN    EAT    <SLABEL    ;SUB    #8    SLABEL
  14.     JMP    EAT    ;            JMP    EAT
  15. KILLER    ;
  16.     MOV    SLABEL2    <SLABEL2    ;@SLABEL2
  17.     DJN    KILLER    <SLABEL2    ;SUB    #8    SLABEL2
  18.     JMP    KILLER    ;            JMP    KILLER
  19.     ;
  20. SLABEL    SPL    0
  21. SLABEL2    DAT    START
  22. COUNTER    DAT    512
  23.     END
  24.